home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Magazin: Amiga-CD 1996 May & June
/
Amiga-CD 1996 #5-6.iso
/
pd-disketten
/
dms-gepackt
/
2_96
/
apd-2-96-2.dms
/
apd-2-96-2.adf
/
Amiga-E-Kurs
/
Listing_1.e
< prev
next >
Wrap
Text File
|
1996-01-16
|
404b
|
13 lines
DEF zeiger:PTR TO LONG, a=2
PROC main()
WriteF('1. zeiger = $\z\h[8] a = \d\n',zeiger,a)
zeiger:={a} /* Zeiger auf Adresse von a richten */
WriteF('2. zeiger = $\z\h[8] a = \d\n',zeiger,a)
^zeiger:=5 /*an Adresse, auf die zeiger verweist,
den Wert 5 schreiben*/
WriteF('3. zeiger = $\z\h[8] a = \d\n',zeiger,a)
a:=6
WriteF('4. ^zeiger = \d a = \d\n',^zeiger,a)
ENDPROC